home *** CD-ROM | disk | FTP | other *** search
/ PC User 2002 August / Disc 2 / PCU0802CD2.iso / tutorial / macromed / files / square_root.swf / texts / 18.txt < prev    next >
Encoding:
Text File  |  2002-06-23  |  290 b   |  10 lines
  1. On (Release)
  2.             Set Variable: "i" = "0" 
  3.             Set Variable: "x" = "1" 
  4.             Loop While (i < 20) 
  5.               Set Variable: "x" = x-((x*x-value)/(2*x)) 
  6.               Set Variable: "i" = i+1 
  7.             End Loop 
  8.             Set Variable: "squareRoot" = x 
  9. End On 
  10.